* Очистка стека, т.е. удаление всех элеменов в стеке.

стек поместить 1 2 3
>Количество элементов в стеке до его очистки = [$КоличествоВСтеке]
стек очистить
>Количество элементов в стеке после его очистки = [$КоличествоВСтеке]